home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 7: Sunsite / Linux Cubed Series 7 - Sunsite Vol 1.iso / system / network / info-sys / www / tkhtml-2.3 / tkhtml-2 / tkHTML-2.3 / tix / schemes / OptionDB.tcl < prev    next >
Encoding:
Text File  |  1995-02-12  |  5.2 KB  |  157 lines
  1. proc tixInitOptionDatabase {} {
  2.  
  3. global tixOption
  4.  
  5.  
  6. # general stuff, everything gets these defaults unless otherwise specified
  7. #-------------------------------------------------------------------------
  8. option add *Font        $tixOption(font)    userDefault
  9. option add *Background        $tixOption(bg)        userDefault
  10. option add *Foreground        $tixOption(fg)        userDefault
  11. option add *font        $tixOption(font)    userDefault
  12. option add *background        $tixOption(bg)        userDefault
  13. option add *foreground        $tixOption(fg)        userDefault
  14. option add *activeBackground    $tixOption(active_bg)    userDefault
  15. option add *activeForeground    $tixOption(active_fg)     userDefault
  16. option add *disabledForeground    $tixOption(disabled_fg)    userDefault
  17. option add *anchor        w             userDefault
  18. option add *selectBackground    $tixOption(select_bg)    userDefault
  19. option add *selectForeground    $tixOption(select_fg)    userDefault
  20. option add *selectBorderWidth    0            userDefault
  21. # buttons
  22. #--------
  23. option add  *Button.borderWidth    $tixOption(border1)     userDefault
  24. option add  *Button.anchor    c             userDefault
  25.  
  26. # check buttons
  27. #--------------
  28. option add *Checkbutton.selector    $tixOption(selector)    userDefault
  29. option add *Checkbutton.borderWidth    $tixOption(border1)     userDefault
  30.  
  31. # radio buttons
  32. #--------------
  33. option add *Radiobutton.selector    $tixOption(selector)    userDefault
  34. option add *Radiobutton.borderWidth    $tixOption(border1)     userDefault
  35.  
  36. # entries
  37. #--------
  38. option add *Entry.relief        sunken             userDefault
  39. option add *Entry.background        $tixOption(input1_bg)     userDefault
  40. option add *Entry.foreground        black             userDefault
  41. option add *Entry.insertBackground    black             userDefault
  42.  
  43. # canvas
  44. #-------
  45.  
  46. # frame
  47. #------
  48.  
  49. # labels
  50. #-------
  51. option add *Label.anchor        w            userDefault
  52. option add *Label.borderWidth        0            userDefault
  53. option add *Label.font                  $tixOption(bold_font)    userDefault
  54.  
  55. # listboxs
  56. #---------
  57. option add *Listbox.background        $tixOption(dark1_bg)    userDefault
  58. option add *Listbox.relief        sunken             userDefault
  59.  
  60. # menus
  61. #------
  62. option add *Menu*font            $tixOption(menu_font)    userDefault
  63. option add *Menu*selector        $tixOption(selector)    userDefault
  64.  
  65. # menus buttons
  66. #--------------
  67. option add *Menubutton*font        $tixOption(menu_font)    userDefault
  68.  
  69. # scales
  70. #-------
  71. option add *Scale.foreground        $tixOption(fg)        userDefault
  72. option add *Scale.activeForeground    $tixOption(bg)        userDefault
  73. option add *Scale.background        $tixOption(bg)        userDefault
  74. option add *Scale.sliderForeground    $tixOption(bg)        userDefault
  75. option add *Scale.sliderBackground    $tixOption(dark1_bg)    userDefault
  76. option add *Scale.font            $tixOption(italic_font)    userDefault
  77.  
  78. # scrollbars
  79. option add *Scrollbar.foreground    $tixOption(bg)        userDefault
  80. option add *Scrollbar.activeForeground    $tixOption(bg)         userDefault
  81. option add *Scrollbar.background    $tixOption(dark1_bg)     userDefault
  82. option add *Scrollbar.relief        sunken             userDefault
  83.  
  84. # texts
  85. option add *Text.background        $tixOption(input1_bg)    userDefault
  86. option add *Text.relief            sunken            userDefault
  87. option add *Text.borderWidth        $tixOption(border1)    userDefault
  88. #----------------------------------------------------------------------
  89. # TIX WIDGETS
  90. #----------------------------------------------------------------------
  91. # GENERAL
  92. option add *listboxBg            $tixOption(dark1_bg)    userDefault
  93. option add *listboxFont            $tixOption(font)    userDefault
  94. option add *entryBg            $tixOption(input1_bg)    userDefault
  95. option add *entryFont            $tixOption(font)    userDefault
  96. option add *buttonBg            $tixOption(bg)        userDefault
  97. option add *scrollbarFg            $tixOption(bg)        userDefault
  98. option add *scrollbarBg            $tixOption(dark1_bg)     userDefault
  99.  
  100.  
  101. # CONTROL
  102. option add *TixControl.value         0            userDefault
  103. option add *TixControl.borderWidth     1            userDefault
  104. option add *TixControl.relief             sunken            userDefault
  105.  
  106.  
  107. # COMBOBOX
  108. option add *TixCombobox.entryFont    $tixOption(font)     userDefault
  109.  
  110.  
  111. # DLG_BTNS
  112. option add *TixDlgBtns.borderWidth     1            userDefault
  113. option add *TixDlgBtns.relief         raised            userDefault
  114. option add *TixDlgBtns.anchor         c            userDefault
  115. option add *TixDlgBtns.padx         10            userDefault
  116. option add *TixDlgBtns.pady         10            userDefault
  117. option add *TixDlgBtns.buttonbg        $tixOption(bg)        userDefault
  118.  
  119.  
  120. # FILE_SELECT_BOX
  121. option add *TixFileSelectbox.relief     raised            userDefault
  122. option add *TixFileSelectbox.borderWidth 1            userDefault
  123. option add *TixFileSelectbox.font     $tixOption(bold_font)    userDefault
  124.  
  125.  
  126. # LABEL_FRAME
  127. option add *TixLabelFrame.font         $tixOption(bold_font)    userDefault
  128. option add *TixLabelFrame.anchor     center            userDefault
  129. option add *TixLabelFrame.borderWidth     2            userDefault
  130. option add *TixLabelFrame.padX         2            userDefault
  131. option add *TixLabelFrame.padY         2            userDefault
  132. option add *TixLabelFrame.anchor     sw            userDefault
  133.  
  134.  
  135. # POPUP MENU
  136. option add *TixPopupMenu*Menubutton.background $tixOption(dark1_bg) userDefault
  137.  
  138.  
  139. # SCROLLED_LISTBOX
  140. option add *TixScrolledListbox.scbWidth 15            userDefault
  141.  
  142.  
  143. # SELECT
  144. option add *TixSelect.borderWidth     2            userDefault
  145. option add *TixSelect.relief          sunken            userDefault
  146. option add *TixSelect.buttonBg          $tixOption(bg)        userDefault
  147. option add *TixSelect.selectedBg          $tixOption(dark1_bg)    userDefault
  148.  
  149.  
  150. # STD_DLG_BTNS
  151. option add *TixStdDlgBtns.borderWidth     1            userDefault
  152. option add *TixStdDlgBtns.buttonBg    $tixOption(bg)        userDefault
  153. option add *TixStdDlgBtns.relief     raised            userDefault
  154.  
  155.  
  156. }
  157.